home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / vb / gridpl.exe / UPDATE.FRM (.txt) < prev   
Encoding:
Visual Basic Form  |  1992-01-07  |  11.7 KB  |  449 lines

  1. Update
  2.     Grid Test
  3. System
  4. Form1
  5. GridCell
  6. DebugField
  7. Text1
  8. Grid1
  9.     Menu_File
  10. &File
  11. Menu_File_Open
  12. &Open
  13. Menu_File_Exit
  14. &Exit
  15. Menu_Action
  16. &Action
  17. Menu_Action_Resize_Grid
  18. &Resize Grid
  19. D_sep1
  20. Menu_Action_Refresh
  21. &Refresh
  22.     Menu_Help
  23. &Help
  24. Menu_Help_About
  25. &About
  26. Menu_File_Click8
  27. Menu_New_ClickV
  28. Label1_Click
  29. Text_FieldName
  30. Visible,
  31. Text_FieldName_Click
  32. IndexA
  33. Texti
  34. Caption
  35. Edit_FieldVal 
  36. Edit_FieldName
  37. Text_FieldVal
  38. Edit_FieldVal_Change
  39. Menu_login_Click
  40. RetVal
  41. SqlSetLoginTimet
  42. SqlConn
  43. SqlOpenConnection
  44. ServerName
  45. UserNameI
  46. Password*
  47. WorkstationNamev
  48. ApplicationName
  49. SqlSetTime
  50. Form_Click
  51. @    Form_Load
  52. MainForma
  53. SqlInit@
  54. Menu_Disconnect_Click
  55. SqlExit_
  56. Menu_Connect_Clickf
  57. Label2_Click
  58. Label4_Click
  59. Text5_Change
  60. Command1_Click
  61. Command2_Click
  62. Command3_Clickq
  63. Grid1_Click
  64. Grid1
  65.     RowHeight8
  66. SqlWinExitO
  67. VBSQL1_Error
  68. Severity
  69. ErrorNum
  70. ErrorStrW
  71. RetCode
  72. Label6_Click
  73. Menu_Mod_Click
  74. VBSQL1_Message
  75. Message
  76. State
  77. MsgStr
  78. FieldCount
  79. FieldNamesI
  80.     TableName
  81.     TableData
  82.     TableRows3
  83. SqlCommand
  84.     FieldType&
  85. MAXTABLEROWSn
  86. Menu_Select_Click
  87. Query
  88. SqlSendCmde
  89. FAILG    
  90. SqlNextRow
  91. NOMOREROWS
  92. Field
  93. SqlDataY
  94.     SqlCancelE
  95.     RowScroll
  96. Value
  97. RowScroll_Change
  98. Menu_Query_Click<
  99. Populate
  100. tables
  101. Separator_Click
  102. Txt_SqlField_Change$
  103. Txt_SqlField
  104. NFPoint
  105. Forward_Back_Click
  106.     NFPointer
  107. GridPopulate
  108. LastRowCountU
  109. NClearCellsZ
  110. Forward_Back
  111. Enabled
  112. NFPonter^
  113. Enable
  114. Stor_id
  115. Ord_Num
  116. WidthI
  117. ColWidth
  118. Text19_Change
  119. F_Field:
  120. CountFields,
  121. Form1+
  122. Tempc
  123. SqlFieldg
  124. DetailNamesX
  125. MasterNames
  126. Detailtablew
  127. MasterItems
  128. Detail_Items
  129. Master_Items.
  130. Table_NameK
  131. Detail_Name
  132. Master_Name
  133. Detail_Showt
  134.     PictureUp
  135. Boolean
  136.     Detail_On
  137. Detail_on_Click#
  138. Detail_on_MouseDown1
  139. Button6
  140. Shift\    
  141. Detail_Down>
  142. Detail_on_MouseUp
  143. FALSEA
  144. Label18_Click
  145. StateButtonS
  146. Blank_Grid3
  147. MaxGridRows
  148. MaxGridRow
  149. VScroll_Near_Change{
  150. VScroll_Near
  151. Menu_Orderby_Click
  152. Menu_Edit_Click]
  153. Menu_Report_Click%
  154. F_Label1_Click8
  155. F_Label10_ClickJ
  156. F_Label2_Click
  157. F_Label20_Click~
  158. Menu_Connect_Disconnect_Click
  159. Menu_Connect_Login_Click
  160. Menu_Query_Execute_Click
  161. Update
  162. DBselected
  163. Menu_File_Exit_Click
  164. Setup_Master_Fields!
  165. Setup_Detail_Fields.    
  166. Menu_Query_Where_Clickq    
  167. Menu_Edit_Clear_Click
  168. Detail_FieldCountL
  169. Master_FieldCount
  170. Menu_Record_Clear_Click
  171. Menu_Record_Click
  172. Menu_Record_Refresh_Click
  173. M_TableData
  174. M_Info@
  175. D_Infop
  176. XLASTD
  177. XNAME
  178. TextRem
  179. Menu_Debug_Info_Click(
  180.     Info_Gridh
  181. Init_M_Info
  182. Columns
  183. SqlNumCols
  184. NEEDS
  185. MAJOR
  186. CHANGE
  187. HEREU
  188. DatabaseName
  189.     TableList
  190. ColName
  191. SqlColName
  192. ColType
  193. SqlColTypen
  194. C_Type
  195. ColLen
  196.     SqlColLen_
  197.     FieldList
  198. XTYPEY
  199. XSIZE
  200. XHEDRw
  201. Master_Setup
  202. XQUOT/
  203. Menu_Record_Update_Click
  204. Select_Done
  205. F_Fields
  206. Field_Count
  207. XUPDT
  208. F_Field_AutoTerminate)
  209. KeyCode
  210. F_Field_Change
  211. Last_Update_Field
  212. XINDX
  213.     First_Recf
  214. Update_Required
  215. answer#
  216. Update_Successv
  217. Num_Rows_Updated
  218. SqlCount
  219. Menu_Record_Delete_Clickb
  220. Delete*
  221.     Advisable
  222. Delete_Advisable]
  223. Num_Rows_Changed
  224. Delete_Success
  225. Change_Success
  226. SqlResultsY
  227. Menu_Record_Insert_Click
  228. SUCCESS
  229. Highest_Gl_Num
  230. Near_Ptr
  231. Fetch_Master_Data
  232. Far_Ptr
  233. M_Now
  234. VScroll_Far_Changed
  235. MhVScrollBar1_Change1n
  236. PartBar
  237. VScroll_Far_Change1
  238. VScroll_Far
  239. M_Top_Change
  240. M_Top
  241. M_Max_Change
  242. M_Max2
  243. dummy
  244. Far_Pointer
  245. V_Scroll_Near
  246. VScrollbar
  247. VScrollbar_Change
  248. M_Now_Change
  249. Need_Master_DataH
  250. Last_Schroll_Value&
  251. Last_Scroll_Value
  252. Last_Near_Ptr
  253. Menu_DEbug_Detail_Click`
  254. Detail
  255. Grid1_DblClick
  256. MhInput1_AutoTerminate"
  257.     Detail_In
  258. Detail_In_AutoTerminate
  259. Detail_In_Change3
  260. Detail_In_KeyPress
  261. KeyAscii
  262. Grid1_SelChangeT
  263. Grid1_LostFocus!
  264. Grid1_GotFocusu
  265. SelStartRow
  266.     SelEndRow
  267. SelStartCol
  268.     SelEndCol
  269. Detail_In_KeyDown
  270. SetStart
  271. SelStart
  272.     SelLength"
  273. DebugField_Change
  274. LastRowFieldH
  275. DebugField!
  276. LastGridRow 
  277. IntegerStatich
  278. Detail_In_LostFocus
  279. PrevGridRow
  280. PrevGridCol|
  281. Grid_Delete_Flag
  282. Grid_Insert_Flag
  283. Grid_Update_Flag<
  284. Grid_Insert_Flad
  285. Grid_Change_Flag
  286. Prev_Grid_Row
  287. Grid_Action
  288. Curr_Grid_Row
  289. CurrGridRow5
  290. Grid1_Action
  291. ControlhWndX
  292. GetFocus
  293. SetWindowPoss
  294. hWnd?
  295. hWndInsertAfterk
  296. wFlags
  297.     GetWindow
  298. wCmd;
  299. GetNextWindow
  300. wFlag
  301. GetWindowLong
  302. nIndex
  303. SetWindowLong/
  304.     dwNewLong"
  305. WS_CLIPSIBLINGS
  306. SWP_NOSIZE
  307. SWP_NOMOVEN
  308. GW_HWNDNEXT
  309. GW_CHILD
  310.     GWL_STYLEx
  311. SetClipSiblingBit
  312. hWndParent
  313.     hWndChild
  314. Style
  315. GridColWidth
  316. GridRowWidth+
  317. SetGridWidths
  318. RowWidth
  319. GridRowHeight]
  320. Menu_Detail_Recalibrate_Click
  321. placed
  322. public5
  323. domain
  324. Nelson
  325. possibly
  326. othersq
  327. Menu_DEbug_Clickn
  328. Menu_Record_Get_Data_Click
  329. PrevRow
  330. PrevCol
  331. PreCol
  332. Master_Where=
  333. Master_SortBy
  334. GridCell^
  335. GridCell_AutoTerminate
  336. GridCell_KeyDown
  337. Master_Insert,
  338. Master_UpdateG
  339. Master_Delete
  340. Detail_Insert_
  341. Detail_Updatep
  342. Detail_DelateC
  343. Detail_Delete
  344. TempGridCol
  345. GridInsertRow
  346. TempGridRow
  347. D_TableData
  348. GridUpdateRow
  349. GridDeleteRow
  350. Blank_D_Info_XUPDT2
  351. Blank_D_InfoT
  352. XPREV
  353. ThenIf
  354. Master_Rows_Returned
  355. Same_Num_Rows
  356. Rows_In_Query
  357. Screen
  358. MousePointer
  359. Menu_Options_Keep_Click
  360. Menu_Options_Color_Click
  361. Menu_Edit_Cut_Click
  362. Menu_Edit_Copy_Click
  363. Menu_Edit_Paste_Click    
  364. Menu_Help_Tutorial_Click+
  365. Menu_Help_About_Click{
  366. About`
  367. Menu_Options_Clear_Click
  368. XCLER
  369. Text1_Change
  370. Menu_Detail_Resize_Grid_Click
  371. Set_Grid_Widths
  372. M_Update_Items
  373. D_Update_Items
  374. Master_OrderBy
  375. Menu_File_PrintForm_Click
  376. Highest_Item_Num
  377. DBug'
  378. Menu_Detail_Refresh_ClickC
  379. Menu_Detail_Insert_Click_
  380. Menu_Detail_Delete_Click
  381. Menu_Detail_Update_Click
  382. D_sep1_Click
  383. insert
  384. record
  385. WinExit
  386. Grid_Setup/
  387. Menu_File_Open_Click
  388. overlapping
  389. controls
  390. TopRow
  391. LeftCol
  392. LeftRowL
  393. Menu_Action_Refresh_Click
  394. Menu_Action_Resize_Grid_Click\
  395. The code which allows overlapping VB controls was developed
  396. and placed in the public domain by Jonathon Zuck, Keith Funk,,
  397. Nelson Ford, and possibly others.
  398. ctlhwnd.dll
  399. UserX
  400. UserX
  401. UserX
  402. UserX
  403. UserX
  404. Form_Load
  405.  ~ UPDATE.FRM - Update 
  406. INITIALIZE DETAIL SHOW BUTTON
  407. GridPopulate
  408.  SAVE LOCATION OF GRIDCELL
  409.  - - - - - - - - - - - - - - - - - - - - -
  410.  COPY DATA FROM GRID TO GRIDCELL
  411. Menu_File_Exit_Click
  412. Grid1_SelChange
  413.  POSITION GRIDCELL BASED ON INFO FROM WIDTH ARRAYS
  414.  COPY DATA FROM GRID TO GRIDCELL AND SHIFT FOCUS  
  415. SetClipSiblingBit
  416. SetGridWidths
  417.   FILL ARRAY TO HOLD LEFT POSITION OF GRID CELLS
  418.   FILL ARRAY TO HOLD TOP POSITION OF GRID CELLSS
  419.  - - - - - - - - - - - - - - - -
  420.  POSITION GRID AND GRIDCELL-
  421. GridCell_KeyDown
  422.  CHECK IF KEY IS RETURN OR CURSOR KEY
  423.   If (Shift = 0 And KeyCode = 13) Then
  424.    UPDATE GRID FIELD
  425.    CHECK KEY PRESSED
  426. Alt Up Arrow
  427. Alt Down Arrow
  428. Alt Left Arrow
  429. Alt Right Arrow
  430. , P.Row=
  431. , C.Row = 
  432. , Col = 
  433. Grid_Setup
  434.  PREPARE FOR OVERLAPPING CONTROLS
  435. GET HWND FOR THE CONTROLSC
  436. Menu_File_Open_Click
  437. Menu_Help_About_Click
  438. The grid control and the code which allows overlapping VB controls was developed "
  439. and placed in the public domain by Jonathon Zuck, Keith Funk, 
  440. Nelson Ford, unknown (but gratefully acknowledged) Microsoft programmers and possibly others.  "
  441. Many thanks to them all.
  442. I adapted the code to deal with changes in grid column widths and 
  443. cursor positioning via the mouse in addition to the <Cntrl><Curser> keys."
  444. See the files GR-RTN.EXE and CLPSIB.ZIP for further information about 
  445. the grid and overlapping VB controls."
  446. Laurence Bates - 1/2/92"
  447. Menu_Action_Refresh_Click
  448. Menu_Action_Resize_Grid_Click
  449.